Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/i-macros.sc

Text File | 1993-07-16 | 3KB | 1 lines

(dependencies (standard0 list-fns scan-args) names (i-macros) length 514 nslots 1 code ((36 (%%-big-arg-%% 17)) (5 (%%-big-arg-%% 0)) (3 0) (31 (%%-big-arg-%% 110)) (17 1) (36 (%%-big-arg-%% 27)) (5 (%%-big-arg-%% 0)) (4 (%%-static-%% . 22)) (46) (1 (%%-link-me-%% boot . make-installed-module)) (34 2) (36 (%%-big-arg-%% 40)) (5 (%%-big-arg-%% 0)) (8 3) (4 (%%-static-%% . 20)) (5 (%%-me-local--%% . definstruction)) (3 0) (39) (8 0) (17 1) (1 (%%-link-me-%% boot . install-local-bindings)) (34 3) (17 1) (36 (%%-big-arg-%% 28)) (5 (%%-big-arg-%% 1)) (8 3) (4 (%%-static-%% . 21)) (1 (%%-link-me-%% boot . make-interface)) (34 2) (17 1) (14 2 1) (37) (22 0) (36 (%%-big-arg-%% 23)) (11) (40 -3) (4 (%%-static-%% . 19)) (30) (7 (%%-me-local--%% . definstruction)) (18) (3 1) (37) (36 (%%-big-arg-%% 29)) (1 (%%-link-me-%% scan-args . scan-args)) (4 (%%-static-%% . 0)) (8 5) (4 (%%-static-%% . 1)) (12) (34 3) (1 (%%-link-me-%% symbols . make-symbol)) (36 (%%-big-arg-%% 29)) (1 (%%-link-me-%% extras0 . format)) (3 0) (4 (%%-static-%% . 2)) (8 10) (3 0) (39) (12) (34 -3) (62 1) (4 (%%-static-%% . 3)) (4 (%%-static-%% . 4)) (11) (4 (%%-static-%% . 5)) (4 (%%-static-%% . 6)) (4 (%%-static-%% . 7)) (3 0) (39) (39) (4 (%%-static-%% . 6)) (8 11) (3 0) (39) (39) (4 (%%-static-%% . 6)) (4 (%%-static-%% . 0)) (3 0) (39) (39) (8 8) (4 (%%-static-%% . 6)) (4 (%%-static-%% . 8)) (3 0) (39) (39) (8 13) (36 (%%-big-arg-%% 49)) (1 (%%-link-me-%% boot . append)) (36 (%%-big-arg-%% 30)) (1 (%%-link-me-%% init . mapcar)) (36 (%%-big-arg-%% 179)) (8 20) (40 1) (8 20) (3 0) (12) (34 -3) (3 0) (11) (34 2) (39) (39) (39) (39) (39) (39) (39) (3 0) (39) (39) (39) (4 (%%-static-%% . 4)) (8 8) (4 (%%-static-%% . 9)) (4 (%%-static-%% . 10)) (3 0) (39) (4 (%%-static-%% . 11)) (4 (%%-static-%% . 12)) (4 (%%-static-%% . 6)) (4 (%%-static-%% . 13)) (3 0) (39) (39) (8 9) (4 (%%-static-%% . 6)) (4 (%%-static-%% . 14)) (3 0) (39) (39) (4 (%%-static-%% . 15)) (4 (%%-static-%% . 10)) (4 (%%-static-%% . 16)) (3 0) (39) (39) (39) (3 0) (39) (39) (39) (39) (39) (39) (3 0) (39) (39) (39) (3 0) (39) (39) (39) (4 (%%-static-%% . 17)) (4 (%%-static-%% . 6)) (8 10) (3 0) (39) (39) (8 10) (3 0) (39) (39) (39) (4 (%%-static-%% . 18)) (8 5) (8 11) (3 0) (39) (39) (39) (3 0) (39) (39) (39) (39) (14 8 2) (39) (37) (4 (%%-static-%% . 6)) (3 0) (39) (9) (12) (3 0) (39) (29) (18) (15 3) (37)) statics (nargs 0 "~a-info" progn defconstant make-instruction quote name bytecode lambda x make-instance instruction info args convert <vector> add-instruction export 39 (definstruction) ((strip (union (import standard0) (import list-fns) (import scan-args))) definstruction) i-macros))